﻿Public Class CSachCrt
    Private m_iMa As Integer
    Public Property Ma() As Integer
        Get
            Return m_iMa
        End Get
        Set(ByVal value As Integer)
            m_iMa = value
        End Set
    End Property


    Private m_sTen As String
    Public Property Ten() As String
        Get
            Return m_sTen
        End Get
        Set(ByVal value As String)
            m_sTen = value
        End Set
    End Property


    Private m_iMaTheLoai As Integer
    Public Property MaTheLoai() As Integer
        Get
            Return m_iMaTheLoai
        End Get
        Set(ByVal value As Integer)
            m_iMaTheLoai = value
        End Set
    End Property


    Private m_iMaDauSach As Integer
    Public Property MaDauSach() As Integer
        Get
            Return m_iMaDauSach
        End Get
        Set(ByVal value As Integer)
            m_iMaDauSach = value
        End Set
    End Property


    Private m_iMaTinhTrang As Integer
    Public Property MaTinhTrang() As Integer
        Get
            Return m_iMaTinhTrang
        End Get
        Set(ByVal value As Integer)
            m_iMaTinhTrang = value
        End Set
    End Property

    Private m_TenTacGia As String
    Public Property TenTacGia() As String
        Get
            Return m_TenTacGia
        End Get
        Set(ByVal value As String)
            m_TenTacGia = value
        End Set
    End Property



    Private m_iNamXuatBanTu As DateTime
    Public Property NamXuatBanTu() As DateTime
        Get
            Return m_iNamXuatBanTu
        End Get
        Set(ByVal value As DateTime)
            m_iNamXuatBanTu = value
        End Set
    End Property


    Private m_iNamXuatBanDen As DateTime
    Public Property NamXuatBanDen() As DateTime
        Get
            Return m_iNamXuatBanDen
        End Get
        Set(ByVal value As DateTime)
            m_iNamXuatBanDen = value
        End Set
    End Property



    Private m_bCheckTinhTrangSach As Boolean
    Public Property CheckTinhTrangSach() As Boolean
        Get
            Return m_bCheckTinhTrangSach
        End Get
        Set(ByVal value As Boolean)
            m_bCheckTinhTrangSach = value
        End Set
    End Property

    Private m_bCheckMaDauSach As Boolean
    Public Property CheckMaDauSach() As Boolean
        Get
            Return m_bCheckMaDauSach
        End Get
        Set(ByVal value As Boolean)
            m_bCheckMaDauSach = value
        End Set
    End Property


    Private m_iTriGia As Integer
    Public Property TriGia() As Integer
        Get
            Return m_iTriGia
        End Get
        Set(ByVal value As Integer)
            m_iTriGia = value
        End Set
    End Property


    Private m_iTienPhatMatSach As Integer
    Public Property TienPhatMatSach() As Integer
        Get
            Return m_iTienPhatMatSach
        End Get
        Set(ByVal value As Integer)
            m_iTienPhatMatSach = value
        End Set
    End Property


    Private m_iMaNguoiTiepNhan As Integer
    Public Property MaNguoiTiepNhan() As Integer
        Get
            Return m_iMaNguoiTiepNhan
        End Get
        Set(ByVal value As Integer)
            m_iMaNguoiTiepNhan = value
        End Set
    End Property


    Private m_sNhaXuatBan As String
    Public Property NhaXuatBan() As String
        Get
            Return m_sNhaXuatBan
        End Get
        Set(ByVal value As String)
            m_sNhaXuatBan = value
        End Set
    End Property



    Private m_bCheckMaSach As Boolean
    Public Property CheckMaSach() As Boolean
        Get
            Return m_bCheckMaSach
        End Get
        Set(ByVal value As Boolean)
            m_bCheckMaSach = value
        End Set
    End Property


    Private m_bCheckTenSach As Boolean
    Public Property CheckTenSach() As Boolean
        Get
            Return m_bCheckTenSach
        End Get
        Set(ByVal value As Boolean)
            m_bCheckTenSach = value
        End Set
    End Property



    Private m_bCheckTenTacGia As Boolean
    Public Property CheckTenTacGia() As Boolean
        Get
            Return m_bCheckTenTacGia
        End Get
        Set(ByVal value As Boolean)
            m_bCheckTenTacGia = value
        End Set
    End Property



    Private m_bCheckNamXuatBan As Boolean
    Public Property CheckNamXuatBan() As Boolean
        Get
            Return m_bCheckNamXuatBan
        End Get
        Set(ByVal value As Boolean)
            m_bCheckNamXuatBan = value
        End Set
    End Property


    Private m_bCheckTheLoaiSach As Boolean
    Public Property CheckTheLoaiSach() As Boolean
        Get
            Return m_bCheckTheLoaiSach
        End Get
        Set(ByVal value As Boolean)
            m_bCheckTheLoaiSach = value
        End Set
    End Property


    Private m_bCheckNhaXuatBan As Boolean
    Public Property CheckNhaXuatBan() As Boolean
        Get
            Return m_bCheckNhaXuatBan
        End Get
        Set(ByVal value As Boolean)
            m_bCheckNhaXuatBan = value
        End Set
    End Property



    Private m_sTenTheLoai As String
    Public Property TenTheLoai() As String
        Get
            Return m_sTenTheLoai
        End Get
        Set(ByVal value As String)
            m_sTenTheLoai = value
        End Set
    End Property


    Private m_sTenTinhTrang As String
    Public Property TenTinhTrang() As String
        Get
            Return m_sTenTinhTrang
        End Get
        Set(ByVal value As String)
            m_sTenTinhTrang = value
        End Set
    End Property
End Class

